LogClear () --> true/false:
~~~~~~~~~~~~~~~~~~~~~~~~~~

Functions:
~~~~~~~~~~
Clears the counter of working users.

Parameter description:
~~~~~~~~~~~~~~~~~~~~~~
nil

Return value:
~~~~~~~~~~~~~
true if the counter was cleared

Remarks:
~~~~~~~~
Counter is a ViewID field in the first record in OBasic1.dbf

Example:
~~~~~~~~
    select OBasic1
    Go 1
    ? Obasic1->ViewID   //the current working users number is printed

Source code is in file  Object3.prg